home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1997 February / EnigmA AMIGA RUN 15 (1997)(G.R. Edizioni)(IT)[!][issue 1997-02][PLANET CD V].iso / enigma / earcd / giochi / giochi4 / hug22ar9.lha / Hugo / Library / anyverb.h next >
Text File  |  1996-11-16  |  542b  |  22 lines

  1. !----------------------------------------------------------------------------
  2. ! ANYVERB.H
  3. !
  4. ! An extension to the Hugo Library (HUGOLIB.H) 2.2.0
  5. !
  6. ! Copyright (c) 1996 by Kent Tessman
  7. !
  8. ! AnyVerb(obj)
  9. ! returns <obj> if the verbroutine global is not within the range of xverbs;
  10. ! otherwise returns false
  11. !----------------------------------------------------------------------------
  12.  
  13. routine AnyVerb(obj)
  14. {
  15.         if verbroutine >= &DoHello and verbroutine <= &DoUndo
  16.                 return false
  17.         else
  18.                 return obj
  19. }
  20.  
  21. 
  22.